home *** CD-ROM | disk | FTP | other *** search
/ Click - International Series 1 / Click Jigsaw Puzzles: Ken Duncan.iso / mac / puzzles / Stonehenge.dxr / 00259_close Dialog Import.ls < prev    next >
Encoding:
Text File  |  2002-11-11  |  1.1 KB  |  46 lines
  1. property spriteNum
  2. global preloadID
  3.  
  4. on new me, spriteRef
  5.   if the paramCount = 1 then
  6.     nothing()
  7.   else
  8.     if the paramCount = 2 then
  9.       spriteNum = spriteRef.spriteNum
  10.     end if
  11.   end if
  12.   return me
  13. end
  14.  
  15. on mouseDown me
  16.   set the member of sprite the spriteNum of me to member(word 1 of the name of the member of sprite the spriteNum of me && "click")
  17.   updateStage()
  18. end
  19.  
  20. on mouseUp me
  21.   set the member of sprite the spriteNum of me to word 1 of the name of the member of sprite the spriteNum of me
  22.   updateStage()
  23.   if preloadID > 0 then
  24.     netAbort(preloadID)
  25.     preloadID = 0
  26.   end if
  27.   clearDialog()
  28. end
  29.  
  30. on mouseUpOutSide me
  31.   set the member of sprite the spriteNum of me to word 1 of the name of the member of sprite the spriteNum of me
  32.   updateStage()
  33. end
  34.  
  35. on mouseEnter me
  36.   if the stillDown and (the clickOn = me.spriteNum) then
  37.     set the member of sprite the spriteNum of me to word 1 of the name of the member of sprite the spriteNum of me && "click"
  38.     updateStage()
  39.   end if
  40. end
  41.  
  42. on mouseLeave me
  43.   set the member of sprite the spriteNum of me to word 1 of the name of the member of sprite the spriteNum of me
  44.   updateStage()
  45. end
  46.